home *** CD-ROM | disk | FTP | other *** search
/ Aminet 33 / Aminet 33 - October 1999.iso / Aminet / util / batch / boot-startup.lha / Boot-startup < prev    next >
Encoding:
AmigaDOS Script File  |  1999-01-10  |  1.5 KB  |  83 lines

  1. .key dummy
  2. .bra {
  3. .ket }
  4. requestchoice >env:rq{$$} "Startup Choice" "Click on the option of your choice*n*n1,2 & 3 can't be loaded after WorkBench" "Banshee" "PGA Golf" "Pinball" "CD Boot" "Menu2" "WorkBench"
  5. if $rq{$$} EQ "0"
  6.     skip out
  7. endif
  8. if $rq{$$} EQ "1"
  9.     skip ban
  10. endif
  11. if $rq{$$} EQ "2"
  12.     skip pga
  13. endif
  14. if $rq{$$} EQ "3"
  15.     skip Ball
  16. endif
  17. if $rq{$$} EQ "4"
  18.     skip CD
  19. endif
  20. if $rq{$$} EQ "5"
  21.     skip Menu2
  22. endif
  23. lab ban
  24. work:
  25. games
  26. banshee
  27. execute bansheehd
  28. skip out
  29. lab pga
  30. ;START OF PGA EUROPEAN GOLF ASSIGNS
  31. assign glf1: WORK:GAMES/pgagolf
  32. assign glf2: WORK:GAMES/pgagolf
  33. IF EXISTS s:user-startup
  34.   Execute s:user-startup
  35. EndIF
  36. ;END OF PGA EUROPEAN GOLF ASSIGNS
  37. glf1:
  38. golf
  39. skip out
  40. lab Ball
  41. work:
  42. games
  43. mania
  44. mania
  45. skip out
  46. lab Menu2
  47. execute s:boot-startup2
  48. unsetenv rq{$$}
  49. endcli
  50. endif
  51. lab CD
  52. mount CD0:
  53. requestchoice >env:cdrom{$$} "CD Boot" "Click on option of your choice" "RoadKill" "CD32 Boot" "Cancel"
  54. if $cdrom{$$} EQ "0"
  55.     execute s:boot-startup
  56.     unsetenv cdrom{$$}
  57.     unsetenv rq{$$}
  58.     endcli
  59. endif
  60. if $cdrom{$$} EQ "1"
  61.     skip roadkill
  62. endif
  63. if $cdrom{$$} EQ "2"
  64.     skip cd32
  65. endif
  66. lab roadkill
  67. requestchoice >env:ok{$$} "RoadKill" "Check RoadKill Disk is in CD-Rom drive*n*nClick OK when ready to play" "OK"
  68. if $ok{$$} EQ "0"
  69.     if exists roadkill:
  70.         skip cd32
  71.     endif
  72. endif
  73. skip cd32
  74. lab cd32
  75. system3.1:wbstartup/cyberpatcher
  76. system3.1:idefix/cd32/cd32  
  77. skip out
  78. lab out
  79. unsetenv rq{$$}
  80. c:setpatch QUIET
  81. execute s:startup-sequence-cont
  82. endcli
  83.